home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / timer11.zip / MAKEUTIL.ZIP / FOREACH.C < prev    next >
C/C++ Source or Header  |  1992-04-18  |  4KB  |  157 lines
  1. /****************************************************************************
  2. *
  3. *                                Foreach
  4. *
  5. *                    Copyright (C) 1991 Kendall Bennett.
  6. *                            All rights reserved.
  7. *
  8. * Filename:        $RCSfile: foreach.c $
  9. * Version:        $Revision: 1.1 $
  10. *
  11. * Language:        ANSI C
  12. * Environment:    MS DOS
  13. *
  14. * Description:    Program to execute the same command for a number of
  15. *                different files. The list of files is passed in via a
  16. *                simple text file. We try to fit as many files on the
  17. *                command line as possible (120 chars max for MS DOS
  18. *                compatibility).
  19. *
  20. * $Id: foreach.c 1.1 92/04/18 17:26:05 kjb Exp $
  21. *
  22. * Revision History:
  23. * -----------------
  24. *
  25. * $Log:    foreach.c $
  26. * Revision 1.1  92/04/18  17:26:05  kjb
  27. * Initial revision
  28. * 
  29. ****************************************************************************/
  30.  
  31. #include <stdio.h>
  32. #include <malloc.h>
  33. #include <process.h>
  34. #include <string.h>
  35. #include <ctype.h>
  36.  
  37. #ifdef __MSDOS__
  38. #include <dir.h>
  39. #endif
  40.  
  41. #define    MAX_FILES        200            /* 200 files maximum                */
  42. #define    MAXLINELEN        120            /* 128 chars to a command line        */
  43.  
  44. #define    true            1
  45. #define    false            0
  46.  
  47. /*------------------------- Global variables ------------------------------*/
  48.  
  49. char    *rcsid = "$Id: foreach.c 1.1 92/04/18 17:26:05 kjb Exp $";
  50. char    *filenames[MAX_FILES];
  51.  
  52. /* Adjust the size of the default stack and heap so that we dont take
  53.  * up too much memory from the child process. A small stack of 256 bytes
  54.  * should be enough, and a heap of 5k should suffice to hold the list of
  55.  * names to process.
  56.  */
  57.  
  58. extern unsigned    _stklen        = 256;
  59. extern unsigned _heaplen    = 5*1024;
  60.  
  61. /* Open a file returning true if successful */
  62.  
  63. int openfile(FILE **in,char *filename,char *mode)
  64. {
  65.     if( (*in = fopen(filename,mode) ) == NULL) {
  66.         return false;    /* Open failed                                    */
  67.         }
  68.     else
  69.         return true;    /* Open was successful                            */
  70. }
  71.  
  72. void readfilenames(char *name,char *filenames[],int *numfiles)
  73. /****************************************************************************
  74. *
  75. * Function:        readfilenames
  76. * Parameters:    name        - Name of file to read filenames from
  77. *                filenames[]    - Array to place filenames in
  78. *                numfiles    - Number of filenames read
  79. *
  80. * Description:    Reads the names of the files to translate from the
  81. *                specified file 'name'. We expect each file name to we
  82. *                a whole word on the line and ignore all whitespace.
  83. *
  84. ****************************************************************************/
  85. {
  86.     char    buf[MAXPATH];
  87.     FILE    *f;
  88.  
  89.     if (!openfile(&f,name,"rt")) {
  90.         printf("Unable to open the file: %s\n",name);
  91.         exit(1);
  92.         }
  93.  
  94.     *numfiles = 0;
  95.     while (!feof(f) && (fscanf(f," %s ",buf) == 1)) {
  96.         filenames[*numfiles] = strdup(buf);
  97.         (*numfiles)++;
  98.         }
  99.  
  100.     fclose(f);
  101. }
  102.  
  103. int main(int argc,char *argv[])
  104. {
  105.     char    prefix[MAXLINELEN];
  106.     char    command[MAXLINELEN];
  107.     int        i,numfiles,length,totallength,prefixlength;
  108.     int        group = true;
  109.  
  110.     if (strcmp(argv[1],"-nogroup") == 0) {
  111.         group = false;
  112.         argv++;
  113.         argc--;
  114.         }
  115.  
  116.     if (argc != 3) {
  117.         printf("Usage: foreach [-nogroup] \"command\" <filelist>\n\n");
  118.         printf("where <filelist> is the name of a file containing the\n");
  119.         printf("filenames for excute command on. If -nogroup is specified\n");
  120.         printf("the command is executed once for every file in <filelist>, otherwise\n");
  121.         printf("the filenames are grouped together on the command line.\n");
  122.         exit(1);
  123.         }
  124.  
  125.     strcpy(prefix,argv[1]);
  126.     prefixlength = strlen(prefix);
  127.     readfilenames(argv[2],filenames,&numfiles);
  128.  
  129.     /* Execute command once for every file in the list */
  130.  
  131.     for (i = 0; i < numfiles;) {
  132.         strcpy(command,prefix);
  133.         totallength = prefixlength;
  134.         while (totallength < MAXLINELEN && i < numfiles) {
  135.             if ((length = strlen(filenames[i])) == 0) {
  136.                 i++;
  137.                 continue;
  138.                 }
  139.             if ((totallength += length+1) < MAXLINELEN) {
  140.                 strcat(command," ");
  141.                 strcat(command,filenames[i++]);
  142.                 }
  143.             if (!group)
  144.                 break;
  145.             }
  146.         printf(command);
  147.         printf("\n");
  148.  
  149.         if (system(command)) {
  150.             perror("Command failed: ");
  151.             exit(1);
  152.             }
  153.         }
  154.  
  155.     return 0;
  156. }
  157.